home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / util / time / backclock.lha / BackClock / Install next >
Text File  |  1998-10-17  |  4KB  |  137 lines
  1. ;/* install script version 1.1
  2. ; * $VER: BCInstall 1.2 (17-10-98)
  3. ; */
  4.  
  5.  
  6. (set #inst_text "BackClock Installation on Hard Disk")
  7. (set #prog "backclock")
  8. (set #notlib "notityintuition.library")
  9. (set @minuser "Intermediate")
  10. (set @appname "BackClock")
  11. (set #gosrc      1)
  12. (set #gobootup   1)
  13. (set #defpathprefs "sys:prefs/")
  14.  
  15.  
  16. (set #destdir_prompt "Where do you want to install BackClock\nA drawer will be created.")
  17. (set #destdirprefs   "Where do you want to install BackClock preferences.")
  18.  
  19. (set #destdir (askdir
  20.     (prompt #destdir_prompt)
  21.     (help @askdir-help)
  22.     (default "Work:")
  23.   )
  24. )
  25.  
  26. (set @default-dest (tackon #destdir "BackClock"))
  27. (if (not (exists (@default-dest)))
  28.   (makedir @default-dest (infos))
  29. )
  30. (if (not (exists (tackon "libs:" #notlib)))
  31.   (message "\nnotifyintuition.library not found. Do you want to continue the installation? See help for more"
  32.     (help    "You need notifyintuition.library V2.0 to run this prog, this library can be found on aminet util/wb/clvrwin.lha")
  33.   )
  34. )
  35.  
  36. (if(>= (getversion #notlib) 131072)
  37.      (message  "\nnotifyintuition.library too old. Do you want to continue the installation? Notifyintuition.library can be found on Aminet in the directory /util/wb/clvrwin.lha"
  38.        (help "notifyintution.library must be version 2.0 so go and get it right now!!!")
  39.      )
  40. )
  41.  
  42.  
  43.  
  44. (if (>= @user-level 1)
  45.   (set #gobootup
  46.     (askbool
  47.       (prompt "Do you want to run BackClock each startup ?")
  48.       (help   "If you answer yes, then BackClock will be copied to SYS:WBStartup.")
  49.     )
  50.   )
  51. )
  52.  
  53. (set #sourcepath @default-dest)
  54.  
  55. (if (>= @user-level 1)
  56.   (set #defpathprefs (askdir
  57.     (prompt #destdirprefs)
  58.     (help   "Please choose where to place the preferences utility.")
  59.     (default #defpathprefs)
  60.     )
  61.   )
  62. )
  63. (if (>= @user-level 1)
  64.   (if (askbool
  65.         (prompt "Do you want to install sources ?")
  66.         (help   "This will install the sources of the program in the directory sources./")
  67.       )
  68.       (
  69.         ;install sources
  70.         (set #gosrc 1)
  71.         (if (= 2 @user-level)
  72.           (
  73.             (set #sourcepath (askdir
  74.                 (prompt "Where do you want to install sources codes ?\nA drawer called sources will be created there.")
  75.                 (help   "You have to choose where the sources be placed.")
  76.                 (default @default-dest)
  77.               )
  78.             )
  79.           )
  80.         )
  81.       )
  82.       ; don't install sources
  83.       (set #gosrc 0)
  84.   )
  85. )
  86.  
  87. (if (= 1 #gosrc)
  88.   ((if (not (exists (tackon #sourcepath "sources")))
  89.                (makedir (tackon #sourcepath "sources"))
  90.             )
  91.   )
  92. )
  93.  
  94. (copyfiles
  95.   (prompt "Copying Main file")
  96.   (help   "Copy the executable and the icon of the main file in the path you choosed")
  97.   (source "bin/")
  98.   (dest   @default-dest)
  99.   (all)
  100. )
  101. (copyfiles
  102.   (prompt "Copying preferences program")
  103.   (help   "Copy the preferences executable and the icon file in the path you choosed")
  104.   (source "prefs/")
  105.   (dest   #defpathprefs)
  106.   (all)
  107. )
  108.  
  109. (copyfiles
  110.   (prompt "Cpying documentation")
  111.   (help   "Copy the documentation in the path you choosed")
  112.   (source "docs/backclock.guide")
  113.   (dest   @default-dest)
  114.   (infos)
  115. )
  116.  
  117. (if (= 1 #gobootup)
  118.   (copyfiles
  119.     (prompt "Copying to WBStartup")
  120.     (help   "Copy the executable file to wbstartup\nThis will run BackClock each reboot.")
  121.     (source "bin/backclock")
  122.     (dest   "SYS:WBstartup/")
  123.     (infos)
  124.   )
  125. )
  126.  
  127. (if (= 1 #gosrc)
  128.   (copyfiles
  129.     (prompt "Copying sources")
  130.     (help   "Copy the sources in C in the the path you choosed")
  131.     (source "sources/")
  132.     (dest   (tackon #sourcepath "sources"))
  133.     (all)
  134.   )
  135. )
  136.  
  137.